(calc-finish-stack-edit): Let math-expr-opers equal the function

math-standard-ops rather than the variable math-standard-opers.

diff --git a/lisp/calc/calc-yank.el b/lisp/calc/calc-yank.el
index abd78e5f926a6be834594e49ce25b5e108364407..a872f69d83fe9fc066a5a7b906d279b6fb80a647 100644 (file)
--- a/lisp/calc/calc-yank.el
+++ b/lisp/calc/calc-yank.el
@@ -559,7 +559,7 @@ To cancel the edit, simply kill the *Calc Edit* buffer."
          (aset str pos ?\,)))
     (switch-to-buffer calc-original-buffer)
     (let ((vals (let ((calc-language nil)
-                     (math-expr-opers math-standard-opers))
+                     (math-expr-opers (math-standard-ops)))
                  (and (string-match "[^\n\t ]" str)
                       (math-read-exprs str)))))
       (when (eq (car-safe vals) 'error)